home *** CD-ROM | disk | FTP | other *** search
/ Home of Orchestra World / Home of Orchestra World.iso / orch.dir / 00021_Script_21 < prev    next >
Text File  |  1980-01-05  |  2KB  |  68 lines
  1. on buttonRoll
  2.   
  3.   puppetSprite 6,TRUE
  4.   puppetSprite 7,TRUE
  5.   puppetSprite 8,TRUE
  6.   puppetSprite 9,TRUE
  7.   puppetSprite 10,TRUE
  8.   puppetSprite 11,TRUE
  9.   puppetSprite 16,TRUE
  10.   puppetSprite 17,TRUE
  11.   puppetSprite 18,TRUE
  12.   puppetSprite 19,TRUE
  13.   puppetSprite 20,TRUE
  14.   puppetSprite 21,TRUE
  15.   puppetSprite 17,TRUE
  16.   set the immediate of sprite 6 to TRUE
  17.   set the immediate of sprite 7 to TRUE
  18.   set the immediate of sprite 8 to TRUE
  19.   set the immediate of sprite 9 to TRUE
  20.   set the immediate of sprite 10 to TRUE
  21.   set the immediate of sprite 11 to TRUE
  22.   set the immediate of sprite 16 to TRUE
  23.   set the immediate of sprite 17 to TRUE
  24.   set the immediate of sprite 18 to TRUE
  25.   set the immediate of sprite 19 to TRUE
  26.   set the immediate of sprite 20 to TRUE
  27.   set the immediate of sprite 21 to TRUE
  28.   set the immediate of sprite 17 to TRUE
  29.   
  30.   if rollover(6) = TRUE then
  31.     set the castNum of sprite 16 to the number of cast "opera.txt"
  32.   else
  33.     set the castNum of sprite 16 to the number of cast "blank1.pct"
  34.   end if
  35.   
  36.   if rollover(7) = TRUE then
  37.     set the castNum of sprite 17 to the number of cast "instru.txt"
  38.   else
  39.     set the castNum of sprite 17 to the number of cast  "blank2.pct"
  40.   end if
  41.   
  42.   
  43.   if rollover(8) = TRUE then
  44.     set the castNum of sprite 18 to the number of cast "slide.txt"
  45.   else
  46.     set the castNum of sprite 18 to the number of cast "blank3.pct" 
  47.   end if
  48.   
  49.   if rollover(9) = TRUE then
  50.     set the castNum of sprite 19 to the number of cast "credit.txt"
  51.   else
  52.     set the castNum of sprite 19 to the number of cast "blank4.pct" 
  53.   end if
  54.   
  55.   if rollover(10) = TRUE then
  56.     set the castNum of sprite 20 to the number of cast "quit.txt"
  57.   else
  58.     set the castNum of sprite 20 to the number of cast "blank5.pct" 
  59.   end if
  60.   
  61.   if rollover(11) = TRUE then
  62.     set the castNum of sprite 21 to the number of cast "search.txt"
  63.   else
  64.     set the castNum of sprite 21 to the number of cast "blank6.pct"
  65.   end if
  66.   
  67.   go to the frame
  68. end buttonRoll